home *** CD-ROM | disk | FTP | other *** search
/ Invisible Universe / Invisible Universe (1995)(Voyager)[Mac-PC].iso / mac / MOVIES / TOC.DIR / 00033_Script_33 < prev    next >
Text File  |  1995-11-21  |  467b  |  16 lines
  1. on mouseDown
  2.   --global gContRetrace  
  3.   --put getProp(gContRetrace,the clickOn) into it
  4.   set info = line (2 + (the clickOn = 17)) of field 307
  5.   
  6.   --put ">>> cast 33: Clicked on : " & the clickOn && it
  7.   
  8.   --set choice = HPopUpMenu("Test" & RETURN & "test 2", 0, the mouseV, the mouseH)
  9.   --put choice
  10.   
  11.   pressNew(info) 
  12.   --set the visibility of sprite gTOCRetraceChan = 1
  13.   
  14.   --put ">>> calling do script with:" && info
  15.   doScriptNew(info)
  16. end